home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 23 / AACD 23.iso / AACD / Programming / tek / array / stringvalid.c < prev    next >
C/C++ Source or Header  |  2001-05-12  |  323b  |  24 lines

  1.  
  2. #include "tek/array.h"
  3.  
  4. /* 
  5. **    TEKlib
  6. **    (C) 2001 TEK neoscientists
  7. **    all rights reserved.
  8. **
  9. **    TBOOL TStringLen(TSTRPTR string)
  10. **
  11. **    get valid state of a dynamic string
  12. **
  13. */
  14.  
  15. TBOOL TStringValid(TSTRPTR string)
  16. {
  17.     if (string)
  18.     {
  19.         TARRAY *a1 = ((TARRAY *) string) - 1;
  20.         return (TBOOL) a1->valid;
  21.     }
  22.     return TFALSE;
  23. }
  24.